home *** CD-ROM | disk | FTP | other *** search
- object PrintPrv: TPrintPrv
- Left = 182
- Top = 120
- Hint = 'Fit'
- AutoScroll = False
- ClientHeight = 447
- ClientWidth = 571
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- WindowState = wsMaximized
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 0
- Top = 0
- Width = 571
- Height = 30
- Align = alTop
- Shape = bsFrame
- end
- object Label1: TLabel
- Left = 134
- Top = 9
- Width = 64
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Copies: '
- end
- object Lab_From: TLabel
- Left = 282
- Top = 8
- Width = 26
- Height = 13
- Alignment = taRightJustify
- Caption = 'From:'
- end
- object Lab_To: TLabel
- Left = 379
- Top = 8
- Width = 13
- Height = 13
- Alignment = taRightJustify
- Caption = 'To'
- end
- object Prn: TPagePrinter
- Left = 18
- Top = 40
- Width = 343
- Height = 370
- HorzScrollBar.Increment = 16
- HorzScrollBar.Range = 210
- HorzScrollBar.Tracking = True
- VertScrollBar.Increment = 16
- VertScrollBar.Range = 293
- VertScrollBar.Tracking = True
- AutoScroll = False
- Color = clGray
- Ctl3D = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = []
- ParentColor = False
- ParentCtl3D = False
- TabOrder = 0
- MeasureUnit = muMillimeters
- AbortOnCancel = True
- AutoFooterFont = False
- AutoHeaderFont = False
- DefaultColWidth = 25.400000000000000000
- FooterFont.Charset = DEFAULT_CHARSET
- FooterFont.Color = clWindowText
- FooterFont.Height = -13
- FooterFont.Name = 'Courier New'
- FooterFont.Style = []
- FriendlyFooter = '&l&d&r&t'
- FriendlyHeader = '&l&i&r&p'
- GradientBackground = False
- HeaderFont.Charset = DEFAULT_CHARSET
- HeaderFont.Color = clWindowText
- HeaderFont.Height = -13
- HeaderFont.Name = 'Courier New'
- HeaderFont.Style = []
- MarginBottom = 25.000000000000000000
- MarginLeft = 25.000000000000000000
- MarginRight = 25.000000000000000000
- MarginTop = 25.000000000000000000
- PageBorderOffset = 1.000000000000000000
- PageBorders = [pbTop, pbBottom]
- ShadowColor = clBlack
- TableFormat = '<25.4|^-25.4|>25.4'
- TableGrid = True
- Title = 'FoxMail 4.0'
- end
- object SPB_Print: TButton
- Left = 6
- Top = 4
- Width = 60
- Height = 22
- Caption = '&Print'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = SPB_PrintClick
- end
- object SPB_Exit: TButton
- Left = 68
- Top = 4
- Width = 60
- Height = 22
- Caption = '&Close'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = SPB_ExitClick
- end
- object Prtv_StatusBar: TZStatusBar
- Left = 0
- Top = 423
- Width = 571
- Height = 24
- Panels = <
- item
- Bevel = pbNone
- Width = 66
- end
- item
- Width = 46
- end
- item
- Width = 50
- end>
- SimplePanel = False
- object SPB_NextPage: TSpeedButton
- Left = 90
- Top = 3
- Width = 20
- Height = 20
- Hint = 'Next page'
- Flat = True
- ParentShowHint = False
- ShowHint = True
- OnClick = SPB_NextPageClick
- end
- object SPB_PrevPage: TSpeedButton
- Left = 70
- Top = 3
- Width = 20
- Height = 20
- Hint = 'Previous page'
- Flat = True
- ParentShowHint = False
- ShowHint = True
- OnClick = SPB_PrevPageClick
- end
- object SPB_SizeDec: TSpeedButton
- Left = 45
- Top = 3
- Width = 20
- Height = 20
- Hint = 'Zoom out'
- Flat = True
- ParentShowHint = False
- ShowHint = True
- OnClick = SPB_SizeDecClick
- end
- object SPB_SizeAdd: TSpeedButton
- Left = 5
- Top = 3
- Width = 20
- Height = 20
- Hint = 'Zoom in'
- Flat = True
- ParentShowHint = False
- ShowHint = True
- OnClick = SPB_SizeAddClick
- end
- object SPB_SizeFit: TSpeedButton
- Left = 25
- Top = 3
- Width = 20
- Height = 20
- Hint = 'Fit'
- Flat = True
- ParentShowHint = False
- ShowHint = True
- OnClick = SPB_SizeFitClick
- end
- end
- object UpDown_Copies: TUpDown
- Left = 233
- Top = 4
- Width = 15
- Height = 21
- Associate = E_Copies
- Min = 1
- Max = 10000
- Position = 1
- TabOrder = 4
- Wrap = False
- end
- object E_Copies: TEdit
- Left = 200
- Top = 4
- Width = 33
- Height = 21
- TabOrder = 5
- Text = '1'
- end
- object UpDown_From: TUpDown
- Left = 345
- Top = 4
- Width = 15
- Height = 21
- Associate = E_From
- Min = 1
- Max = 10000
- Position = 1
- TabOrder = 6
- Wrap = False
- end
- object E_From: TEdit
- Left = 312
- Top = 4
- Width = 33
- Height = 21
- TabOrder = 7
- Text = '1'
- end
- object UpDown_To: TUpDown
- Left = 433
- Top = 4
- Width = 15
- Height = 21
- Associate = E_To
- Min = 1
- Max = 10000
- Position = 1
- TabOrder = 8
- Wrap = False
- end
- object E_To: TEdit
- Left = 400
- Top = 4
- Width = 33
- Height = 21
- TabOrder = 9
- Text = '1'
- end
- object Language: TLanguage
- LangCenter = DM_Language.LangCenter
- ResStrings.Strings = (
-
- '0001=Display rate is %D%S, the current is %D page with total %D ' +
- 'pages.'
- '0002=Print preview'
- '0003=You cancelled printing'
- '0004=There is nothing to print. Press preview first.')
- Left = 420
- Top = 62
- end
- object IL_Zoom: TImageList
- Left = 432
- Top = 120
- end
- end
-